PC Gamer (Italian) 27/PC Gamer IT CD 27.iso/MEDIA/STORE.DXR/Internal_13_web button.ls

Text File | 1997-12-01 | 603 b | 24 lines

on mouseEnter me
  cursor(280)
  set the member of sprite the currentSpriteNum to "web.roll"
  set the text of field "rollover text" to "Click here to launch the website."
end

on mouseLeave me
  cursor(-1)
  set the member of sprite the currentSpriteNum to "web.up"
  set the text of field "rollover text" to EMPTY
end

on mouseDown me
  set the member of sprite the currentSpriteNum to "web.down"
end

on mouseUp me
  set the member of sprite the currentSpriteNum to "web.up"
  if the machineType = 256 then
    open(the text of field "webPath", the text of field "browserSelect")
  else
  end if
end